home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / systems / vm-cms / texshell / texshell.xedit < prev    next >
Text File  |  1993-09-27  |  3KB  |  91 lines

  1. ********************************************************************
  2. * Package  : TeXShell for CMS, version 2.0                         *
  3. * Author   : Humberto Jose' Bortolossi                             *
  4. *                                                                  *
  5. * Bitnet   : hjbortol at brlncc.bitnet, hjbortol at brfuem.bitnet  *
  6. * Internet : hjbortol at gauss.impa.br                             *
  7. *                                                                  *
  8. * Organizations : Instituto de Matematica Pura e Aplicada (IMPA)   *
  9. *                 Fundacao Universidade Estadual de Maringa'       *
  10. *                                                                  *
  11. * Copyright : This program is freely distributable.                *
  12. *             You can do changes but, please, keep my name.        *
  13. *                                                                  *
  14. * Description : Main profile xedit.                                *
  15. *                                                                  *
  16. *                                               (C) Copyright 1992 *
  17. ********************************************************************
  18. *
  19. * SET DEFAULT FILE TYPE TO SCRIPT
  20. *
  21.          &IF &N = 0 &EXIT
  22.          &IF &N = 1 &ARGS &1 SCRIPT
  23.          &COMMAND STATE &1 &2
  24.          &IF &RC = 0 &GOTO -LOAD
  25.          & = &LOCATION OF &2 SCRIPT
  26.          &IF & ^= 1 &GOTO -LOAD
  27.          &ARGS &1 SCRIPT
  28. -LOAD    LOAD &1 &2
  29.          &IF &RC ^= 0 &EXIT &RC
  30. &FN = &1
  31. &FT = &2
  32. &FM = &3
  33. COMMAND TRANSFER TERMINAL NBFILE SIZE SCREEN
  34. &READ VARS &TERMINAL &NBFILE &SIZE &SCR1 &LIN
  35. &IF &TERMINAL = TYPEWRITER &GOTO -NOPFKEYS
  36. &L23 = &LIN - 1
  37. &L24 = &LIN
  38. SET PF1  TEXHELP  &FM
  39. SET PF2  SAVE
  40. SET PF3  FILE
  41. SET PF4  COMPOSE  &FM
  42. SET PF5  LOGVIEW  &FM
  43. SET PF6  VIEW     &FM
  44. SET PF7  BACKWARD
  45. SET PF8  FORWARD
  46. SET PF9  XSPYTEX
  47. SET LINEND OFF
  48. SET PF10 SPLIT CURSOR
  49. SET PF11 JOIN CURSOR
  50. SET LINEND ON
  51. SET PF12 PRINTTEX &FM
  52. SET TEXT ON
  53. SET APL ON
  54. RESER &L23 H ____________________________________________________________________________________________________________________________________________
  55. RESER &L24 H F1 = Help F2 = Save F4 = Compose F5 = LogView F6 = View F9 = Macros F12 = Print
  56. -NOPFKEYS
  57. SET ARBCHAR ON $
  58. SET AUTOSAVE 15
  59. SET CASE MIXED IGNORE
  60. SET CMDLINE TOP
  61. SET CURLINE ON 3
  62. SET TABLINE ON 3
  63. SET MSGMODE ON LONG
  64. SET FULLREAD ON
  65. SET NULLS ON
  66. SET NUMB ON
  67. SET PREFIX ON LEFT
  68. * T PREFIX NULLS
  69. SET SCALE ON 3
  70. SET SPAN ON BLANK
  71. SET STAY  ON
  72. SET COLOR ARROW REVVIDEO NOHI
  73. SET COLOR STATAREA REVVIDEO NOHI
  74. SET COLOR MSGLINE BLINK
  75. SET SYN DSPF Q PF
  76. SET SYN DOWN 1 UP
  77. SET SYN UP 1 DOWN
  78. SET VAR ON
  79. SET WRAP ON
  80. SET MSGMODE ON LONG
  81. SET SPAN ON BLANK
  82. SET STAY  ON
  83. SET COLOR ARROW REVVIDEO NOHI
  84. SET COLOR STATAREA REVVIDEO NOHI
  85. SET COLOR MSGLINE BLINK
  86. SET SYN DSPF Q PF
  87. SET SYN DOWN 1 UP
  88. SET SYN UP 1 DOWN
  89. SET VAR ON
  90. SET WRAP ON
  91.